BBS in a Box 2/BBS in a box - Trilogy II.iso/Files/Hyper/G/Get⁄SetModDate 1.0/Get_SetModDate 1.0/cards.xml

Text File | 1992-08-19 | 5.8 KB | 179 lines

card_2839.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>2839</id>
    <filler1>0</filler1>
    <bitmap>BMAP_4303.pbm</bitmap>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2788</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3217.css" />
    <part>
        <id>9</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>1</left>
            <top>86</top>
            <right>511</right>
            <bottom>309</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Monaco</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name></name>
        <script></script>
    </part>
    <part>
        <id>10</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>2</left>
            <top>54</top>
            <right>114</right>
            <bottom>76</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>GetModDate</name>
        <script>on mouseUp
answer file "Choose a file to examine:"
if it = "" then exit mouseup
put GetModDate(it) into modDate
convert modDate to long date and time
answer modDate
end mouseUp</script>
    </part>
    <part>
        <id>16</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>473</left>
            <top>51</top>
            <right>511</right>
            <bottom>84</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>15664</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Home</name>
        <script>on mouseUp
visual dissolve to black
visual dissolve to white
visual dissolve to black
visual dissolve
go home
end mouseUp
</script>
    </part>
    <part>
        <id>17</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>475</left>
            <top>22</top>
            <right>512</right>
            <bottom>50</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>13510</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Jeff</name>
        <script></script>
    </part>
    <part>
        <id>18</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>116</left>
            <top>54</top>
            <right>228</right>
            <bottom>76</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>SetModDate</name>
        <script>on mouseUp
put the seconds into newModDate
put newmoddate into moddate
convert moddate to long date and time
answer file "Choose a file to set Modification Date:"
if it = "" then exit mouseup
setModDate it,newModDate
answer "Modification date set to" && moddate & "."
end mouseUp</script>
    </part>
    <content>
        <layer>card</layer>
        <id>9</id>
        <text>GetModDate takes one parameter, the pathname of the file to examine. It returns the time in seconds which can be converted to a date. SetModDate takes two parameters, the pathname of the file to work on, and the datetime in seconds. Click on and/or examine the scripts of the buttons above to see how they work!

A small shareware fee of $5 is requested if you use these externals for anything besides personal use.

If you have comments, questions, or suggestions, you can contact me in any of the following ways:

     America Online: J5rson                  AppleLink: ALL.AMERICAN
     CompuServe:     76675,1772              GEnie:     J5rson
     Internet:       [e-mail]          Telephone: [phone]

     U. S. Mail:           Jeff Iverson
                           3841 Whispering Way Dr. SE #101
                           Grand Rapids MI  49546-5849
</text>
    </content>
    <name></name>
    <script></script>
</card>